home *** CD-ROM | disk | FTP | other *** search
/ B Soft 4 / B-Soft_4_19xx_Maik__Mike_de_Side_B.d64 / b-soft no.4 info (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  8KB  |  199 lines
  1. 0 ifa=0thena=1:load"music",8,1
  2. 1 gosub2000:printchr$(142)chr$(8)"[147][154]c64, drogen und rock'n roll!!![146]":gosub1500
  3. 2 poke53280,5:poke53281,5:print"[147]":poke56325,0:print"willkommen zur vierten b-soft-disk!"
  4. 3 print"die info diesmal im armseligen basic, um"
  5. 4 print"'n bisschen speicher zu sparen."
  6. 5 print"wir beginnen gleich, doch vorher eine"
  7. 6 print"traurige mitteilung fuer alle "chr$(34)"roki"chr$(34)"-"
  8. 7 print"fans...":poke56325,55:gosub1500
  9. 10 print"[147]":forx=1to4:printtab(19)"  [146]":nextx
  10. 14 printtab(7)"wir trauern um ronny kiefer[146]"
  11. 15 printtab(7)"es hat nicht sollen sein...[146]"
  12. 16 forx=1to14:printtab(19)"  [146]":nextx
  13. 17 print"[145][145][145][145][145][145][145][145][145]"tab(23)"bitte dort nicht"
  14. 18 printtab(23)"mehr bestellen,"
  15. 19 printtab(23)"ronny kiefer"
  16. 20 printtab(23)"ist nicht mehr.":gosub1500:sys49152
  17. 21 forx=1to4:print"[147]"tab(5)"   [146]         [146]     [146]     [146]    [146]"
  18. 22 printtab(5)" [146]   [146]     [146]     [146]   [146]  [146]      [146]"
  19. 23 printtab(5)"   [146]    [146]     [146]  [146]   [146]    [146]    [146]     [146]"
  20. 24 printtab(5)" [146]   [146]        [146]  [146]   [146]  [146]      [146]"
  21. 25 printtab(5)"   [146]         [146]     [146]  [146]      [146]"
  22. 26 print"  [146]     [146]     [146]     [146]       [146]     [146]      [146]"
  23. 27 print"  [146]  [146]   [146]  [146]     [146]   [146]    [146]   [146]  [146]   [146]      [146]"
  24. 28 print"  [146]  [146]   [146]    [146]   [146]   [146]    [146]   [146]  [146]   [146]      [146]  [146]"
  25. 29 print"  [146]  [146]   [146]  [146]     [146]   [146]    [146]   [146]  [146]   [146]         [146]"
  26. 30 print"  [146]  [146]   [146]  [146]        [146]    [146]   [146]     [146]  [146]      [146]"
  27. 31 fory=1to500:nexty:nextx:print"[147][194]-[211][207][198][212] [206][207].4 [201][206][198][207]"
  28. 32 print"[202]a ja, erst [203]urt [195]obain, dann [200]ilmar [205]o-";
  29. 33 print"ritz und jetzt auch noch [210]onny... [196]ie"
  30. 34 print"[199]uten trifft es immer zuerst! [196]as sollte";
  31. 35 print"euch aber trotzdem nicht davon abhalten,";
  32. 36 print"euch mit dem selben [197]ifer wie sonst auch";
  33. 37 print"auf die neue [194]-[211]oft-[196]isk zu stuerzen."
  34. 38 print"[214]orweg erst einmal das [197]rgebnis unserer"
  35. 39 print"[194]-[211]oft-[195]ompetition. [196]ie [199]ewinner sind:"
  36. 40 print"[215]izard of [196]own / [202]ust 4 [198]un"
  37. 41 print"[196]ave '99 / [206]ew [199]eneration [211]oftware"
  38. 42 print"[212]he [205]isfire / [194]astards"
  39. 43 print"[196]ie versprochenen [208]reise werden denen"
  40. 44 print"natuerlich zugeschickt, viel [211]pass da-"
  41. 45 print"mit! [218]u den ganzen [194]eitraegen spaeter"
  42. 46 print"mehr, jetzt drueckt erstmal eine [212]aste!":gosub999
  43. 47 print"[147][218]u den [211]pielen:[146]"
  44. 48 print"[205][213][211][212][197][210][213][206][199]"
  45. 49 print"[212]ja, da hat man [196]ich einfach so einberu-";
  46. 50 print"fen, bloede [194]undeswehr, so was... [196]och"
  47. 51 print"bevor [196]u richtig beim [205]ilitaer landest,"
  48. 52 print"musst [196]u erstmal den [201]ntelligenztest be-";
  49. 53 print"stehen, auch [201]diotentest genannt."
  50. 54 print"[203][207][212][203][206][193][199][199][197][210]"
  51. 55 print"[198]inde den versteckten [195]ode in diesem"
  52. 56 print"komplizierten [203]nobelteil; es sind nur"
  53. 57 print"sechs [218]eichen!"
  54. 58 print"[199][207][210][204][197][194][197][206][160][201][205][160][211][213][198][198]"
  55. 59 print"[215]er haette auch wissen koennen, dass die";
  56. 60 print"bloede [196]emo in [199]orleben solche [193]usmasse"
  57. 61 print"annimmt. [197]igentlich hattest [196]u heute"
  58. 62 print"[196]einen freien [212]ag und [196]ir nichts dabei"
  59. 63 print"gedacht, [196]ir vorige [206]acht die [194]irne"
  60. 64 print"vollzukippen. [196]och der [193]nruf [196]eines [197]in-";
  61. 65 print"satzleiters stoert [196]einen [203]ater...";:gosub999
  62. 66 print"[147][218]u den [211]pielen:[146]"
  63. 67 print"[208][201][210][193][212][197][211]! [198][213][197][210][160][193][210][205][197]...."
  64. 68 print"[197]nde des 16. [202]ahrhunderts herrschte in"
  65. 69 print"der [203]aribik viel [212]rubel. [215]o sich die"
  66. 70 print"[194]uendnisverhaeltnisse der [211]panier, [197]ng-"
  67. 71 print"laender und [198]ranzosen fast taeglich aen-";
  68. 72 print"derten, zog eine ganz bestimmte [199]ruppe"
  69. 73 print"daraus ihren [206]utzen: die schlimmen [208]ira-";
  70. 74 print"ten! [196]ieses [211]piel ist "chr$(34)"[195]leopatra"chr$(34)" gar"
  71. 75 print"nicht unaehnlich, bloss geht es hier um"
  72. 76 print"[196]ir feindlich gesinnte [211]chiffe, die sich";
  73. 77 print"ungerechterweise hinter schroffen [198]elsen";
  74. 78 print"verstecken, auf die [196]u nicht auflaufen"
  75. 79 print"darfst. [198]uenf [205]inuten bleiben [196]ir, um"
  76. 80 print"die fuenf gegnerischen [211]chiffe zu finden";
  77. 81 print"und zu pluendern."
  78. 82 print"[205][193][196][197][160][201][205][160][211][213][198][198][160][201][201]"
  79. 83 print"[207]h je, hier haben [205]r. [202]oker und ich uns"
  80. 84 print"mal wieder die [203]ante gegeben und dann"
  81. 85 print"total "chr$(34)"im [211]uff"chr$(34)" die [198]ortsetzung des be-"
  82. 86 print"liebten [203]lassikers gemacht.[145]":gosub999
  83. 87 print"[147][218]u den [211]pielen:[146]"
  84. 88 print"[215][193][197][200][210][197][206][196][160][211][212][207][206][197][200][197][206][199][197][160][211][195][200][204][201][197][198]"
  85. 89 print"[196]as war mal wieder'n witziger [193]bend bei"
  86. 90 print"[205]r. [202]oker montags. [196]urch zuviel [203]adarka"
  87. 91 print"war [211]too nicht mehr in der [204]age, nach"
  88. 92 print"[200]ause zu finden, deswegen pennte er auf"
  89. 93 print"meinem [211]ofa. [198]ruehmorgens wurde ich als"
  90. 94 print"[197]rster wach, pfiff mir noch'ne [196]ose [194]ier";
  91. 95 print"'rein und programmierte aus purer [204]ange-";
  92. 96 print"weile dieses [203]urz-[193]dventure."
  93. 97 print"[205][197][210][193][214][201][199][204][201][207][211][207]"
  94. 98 print"[206]un, am selben [212]ag ([211]too war bereits 'ne";
  95. 99 print"ganze [215]eile wach, und ich konnte ihm"
  96. 100 print"stolz mein frisches [205]achwerk praesentie-";
  97. 101 print"ren) haette [211]tonehenge doch beinahe sei-";
  98. 102 print"ne aktuelle [198]ahrstunde verschwitzt. [215]as"
  99. 103 print"haette mir da naeherliegen koennen, auch";
  100. 104 print"aus dieser [199]eschichte ein [195]64-[208]rogramm"
  101. 105 print"herzustellen? [197]s handelt sich hier also"
  102. 106 print"tatsaechlich um zwei wirklich authenti-"
  103. 107 print"sche [211]piele. [212]oll, ne?[145]":gosub999
  104. 108 print"[147][218]u den [211]pielen:[146]"
  105. 109 print"[195][193][210][193][195][212][193][195][213][211]"
  106. 110 print"[197]in faszinierender [211]trategie-[200]ammer von"
  107. 111 print"[198]andomler [196]ietmar [195]remers, dem ich und"
  108. 112 print"[205][202] gar nicht genug danken koennen fuer"
  109. 113 print"die schoenen [196]inge, die er uns vermacht"
  110. 114 print"hat. [211]o um 1746 war die [211]chlacht aller"
  111. 115 print"[211]chlachten: der [203]ampf der [211]chotten gegen";
  112. 116 print"die [197]nglaender! [207]der nicht? [206]a, in die-"
  113. 117 print"sem [211]piel auf jeden [198]all schon! [200]ier"
  114. 118 print"muessen zwei [211]pieler gegeneinander an-"
  115. 119 print"treten. [202]eder gibt pro [210]unde die [194]efehle";
  116. 120 print"an seine [212]ruppe weiter ([210]ichtungen ein-"
  117. 121 print"fach abkuerzen: z.[194]. "chr$(34)"[211]"chr$(34)" fuer [211]ueden"
  118. 122 print"oder "chr$(34)"[206][207]"chr$(34)" fuer [206]ordosten, fuer keine ge-";
  119. 123 print"wuenschten [212]aetigkeiten ist "chr$(34)"[207][203]"chr$(34)" einzu-"
  120. 124 print"geben), eine [210]unde dauert 30 [205]inuten"
  121. 125 print"([211]pielzeit!). [215]urde eine [212]ruppe zer-"
  122. 126 print"streut, gehorcht sie keinen [193]nordnungen"
  123. 127 print"mehr. [197]ine [206]euanordnung kann dann hier"
  124. 128 print"manchmal von [214]orteil sein. [206]ach laenge-"
  125. 129 print"rer [218]eit sind die [211]oldaten des [203]ampfes"
  126. 130 print"muede, und ihre [203]raefte lassen nach. [201]n[145]":gosub999
  127. 131 print"[147][218]u den [211]pielen:[146]"
  128. 132 print"[195][193][210][193][195][212][193][195][213][211] ([198]ortsetzung)"
  129. 133 print"diesem [198]alle sollte man das [211]pektakel"
  130. 134 print"langsam beenden. [201]n diesem ist der [211]inn,";
  131. 135 print"moeglichst viele [212]ruppen des [199]egners zu"
  132. 136 print"zerstreuen oder zu vernichten und dabei"
  133. 137 print"die [205]ehrheit zu behalten. [197]s lohnt sich"
  134. 138 print"jedoch nicht der [214]ersuch, den [198]eind"
  135. 139 print"vollstaendig auszuloeschen, das waere"
  136. 140 print"praktisch unmoeglich."
  137. 150 print"[206]un aber mal langsam einige [197]rklaerungen";
  138. 151 print"zu den [198]avoriten der [194]-[211]oft-[195]ompetition.";
  139. 152 print"[196]ruecke eine [212]aste, um [196]ich schnell zu"
  140. 153 print"informieren.":gosub999
  141. 154 print"[147][194]-[211]oft-[195]ompetition[146]"
  142. 155 print"[196][193][211][160][200][193][197][212][212]'[160][201][195][200][160][206][201][197][160][199][197][196][193][195][200][212]!"
  143. 156 print"[201]n nicht allzuferner [218]ukunft dringen"
  144. 157 print"[195]omputerviren in das globale [204]ebenser-"
  145. 158 print"haltungssystem ein und bedrohen so die"
  146. 159 print"gesamte [205]enschheit!"
  147. 160 print"[194][197][210][204][201][206][160]1233"
  148. 161 print"...ist'n bisschen so wie [203]aiser, [196]u re-"
  149. 162 print"gierst hier das mittelalterliche [194]erlin"
  150. 163 print"und ernaehrst [196]eine treuen [213]ntertanen."
  151. 164 print"[203][201][204][204][160][193][199][193][201][206]"
  152. 165 print"[197]in interessantes [196]enkspiel: [194]efoerdere"
  153. 166 print"[205]enschen und [205]arsianer mit dem [210]aumglei-";
  154. 167 print"ter an die richtige [211]eite der [211]chlucht,"
  155. 168 print"ohne dass sie sich zerfleischen."
  156. 169 print"[212]ut mir leid, dass ich nicht noch mehr"
  157. 170 print"schreibe, doch es sind ausgeschmueckte"
  158. 171 print"[193]nleitungen in den [211]pielen enthalten.[145]":gosub999
  159. 172 print"[147][213]tilities[146]"
  160. 173 print"[196][201][211][203][160][206][201][199][199][197][210]"
  161. 174 print"[197]in nuetzliches [208]rogramm, falls ihr ei-"
  162. 175 print"ne [196]iskette formatieren oder auch nur"
  163. 176 print"loeschen wollt."
  164. 177 print"[212][200][197][160][198][201][206][193][204][160][194][201][207][210][217][212][200][205][213][211]"
  165. 178 print"[213]nd noch ein [194]eitrag fuer die [194]-[211]oft-"
  166. 179 print"[195]ompetition von [212]igerfist ([201][212]). [197]infach"
  167. 180 print"die erforderlichen [196]aten eingeben. [196]ruk-";
  168. 181 print"keroption ist vorhanden."
  169. 182 print"[205][202]'[211] [212][193][199][197][194][213][195][200]"
  170. 183 print"[200]ier koennt ihr eure [197]intragungen vor"
  171. 184 print"[213]nbefugte schuetzen: [196]atum eintippen,"
  172. 185 print"drei durch [203]omma getrennte einstellige"
  173. 186 print"[218]ahlen eingeben und euren [212]ext eingeben"
  174. 187 print"(bis zu 839 [218]eichen). [214]orm [211]peichern er-";
  175. 188 print"scheint noch eine [193]bfrage ([202]/[206]), danach"
  176. 189 print"koennt ihr mit der [207]ption "chr$(34)"[196]ecodieren"chr$(34)
  177. 190 print"den [218]ugang zum [212]ext wieder erreichen.[145]":gosub999
  178. 191 print"[147][213]tilities[146]"
  179. 192 print"[215][200][193][212][160][193][194][207][213][212][160][198][193][206][218][201][206][197][211]"
  180. 193 print"[200]ier sich [205][202] jede [205]enge [193]rbeit gemacht"
  181. 194 print"([213]ngepackt 144 [194]locks), um euch ueber"
  182. 195 print"diverse [218]ines aufzuklaeren. [197]in weiterer";
  183. 196 print"[203]ommentar waere hier ueberfluessig."
  184. 197 print"[213]nd was ist hier sonst noch drauf? [197]in"
  185. 198 print"kleines [200]allo von [205]ister [202]oker, unsere"
  186. 199 print"[211]teckbriefe, die obligatorische [201]nfo und";
  187. 200 print"viele, viele [196]emos! [194]is zum nexten [205]al!"
  188. 202 printtab(22)"[144]     [146]"
  189. 203 printtab(22)" [158][202][212][210][144] [146]"
  190. 204 printtab(22)"     [146]"
  191. 205 print"[208].[211].: [196]ie fuenfte [194]-[211]oft kommt wahr-"
  192. 206 print"scheinlich im [196]ezember 'raus, dann fei-"
  193. 207 print"ern wir einjaehriges [202]ubilaeum![145]"
  194. 208 goto208
  195. 999 geta$:ifa$=""then999
  196. 1000 return
  197. 1500 forx=1to3000:nextx:return
  198. 2000 poke808,225:poke53280,14:poke53281,6:return
  199.